#!/bin/ksh

echo "*************************************************"
echo "* This script will apply the latest R/390 fixes *"
echo "*************************************************"
ps -e |grep dmerror
if [ $? -eq 0 ]
then
	echo ""
	echo "***********************************************************************"
	echo "* ERROR: The P/390 system must be stopped before installing fixes.    *"
	echo "*                                                                     *"
	echo "* Shutdown the S/390 and select 'End P/390' from the R390 Main Menu.  *"
	echo "* Then close the R390 Main Menu.                                      *"
	echo "***********************************************************************"
	return 3
fi
ps -e |grep r390
if [ $? -eq 0 ]
then
	echo ""
	echo "***********************************************************************"
	echo "* ERROR: The P/390 system must be stopped before installing fixes.    *"
	echo "*                                                                     *"
	echo "* Shutdown the S/390 and select 'End P/390' from the R390 Main Menu.  *"
	echo "* Then close the R390 Main Menu.                                      *"
	echo "***********************************************************************"
	return 3
fi
ls -l 4210fixs.lst
if [ $? -ne 0 ]
then
        mv 4210FIXS.LST 4210fixs.lst
        echo ""
        echo "***********************************************************************"
        echo "* Warning: file '4210fixs.lst' not found.                             *"
        echo "*                                                                     *"
        echo "* Attemping to locate and rename an upper case file to lower case.    *"
        echo "***********************************************************************"
        echo ""
        ls -l 4210fixs.lst
        if [ $? -ne 0 ]
        then
		echo ""
		echo "***********************************************************************"
		echo "* ERROR: file '4210fixs.lst' not found.                               *"
		echo "*                                                                     *"
		echo "* Download this file. Use ascii option and lower case.                *"
		echo "***********************************************************************"
		return 3
	fi
fi
ls -l 4210fixs.zip
if [ $? -ne 0 ]
then
        mv 4210FIXS.ZIP 4210fixs.zip
        echo ""
        echo "***********************************************************************"
        echo "* Warning: file '4210fixs.zip' not found.                             *"
        echo "*                                                                     *"
        echo "* Attemping to locate and rename an upper case file to lower case.    *"
        echo "***********************************************************************"
        echo ""
        ls -l 4210fixs.zip
        if [ $? -ne 0 ]
        then
		echo ""
		echo "***********************************************************************"
		echo "* ERROR: file '4210fixs.zip' not found.                               *"
		echo "*                                                                     *"
		echo "* Download this file. Use binary option and lower case.               *"
		echo "***********************************************************************"
		return 3
	fi
fi
/usr/lpp/r390/bin/unzip 4210fixs.zip 
echo ""
echo "*************************************************"
echo "* Saving old version in filename.date           *"
echo "* while installing latest R/390 components.     *"
echo "*************************************************"

cp -p /usr/lpp/r390/bin/dasd 			dasd.$(date +%m%d%y)
cp -p dasd.Bbin /usr/lpp/r390/bin/dasd
echo "cp -p dasd.Bbin /usr/lpp/r390/bin/dasd"
echo "SEE SPECIAL INSTRUCTIONS BELOW (change to ipl390 required)"

cp -p /usr/lpp/r390/bin/dmtape 			dmtape.$(date +%m%d%y)
cp -p dmtape.Abin /usr/lpp/r390/bin/dmtape
echo "cp -p dmtape.Abin /usr/lpp/r390/bin/dmtape"

cp -p /usr/lpp/r390/bin/dmparca 		dmparca.$(date +%m%d%y)
cp -p dmparca.Ebin /usr/lpp/r390/bin/dmparca
echo "cp -p dmparca.Ebin /usr/lpp/r390/bin/dmparca"

cp -p /usr/lpp/r390/bin/dm3172 			dm3172.$(date +%m%d%y)
cp -p dm3172.Abin /usr/lpp/r390/bin/dm3172
echo "cp -p dm3172.Abin /usr/lpp/r390/bin/dm3172"

cp -p /etc/drivers/p390dd 		p390dd.$(date +%m%d%y)
cp -p p390dd.Bbin /etc/drivers/p390dd
echo "cp -p p390dd.Bbin /etc/drivers/p390dd"

cp -p /etc/methods/cfgp390		cfgp390.$(date +%m%d%y)
cp -p cfgp390.Abin /etc/methods/cfgp390
echo "cp -p cfgp390.Abin /etc/methods/cfgp390"

cp -p /usr/lpp/r390/bin/stop390             stop390.$(date +%m%d%y)
cp -p stop390.Abin /usr/lpp/r390/bin/stop390
echo "cp -p stop390.Abin /usr/lpp/r390/bin/stop390"

cp -p /usr/lpp/r390/bin/AWSTerm             AWSTerm.$(date +%m%d%y)
cp -p AWSTerm.Bbin /usr/lpp/r390/bin/AWSTerm
echo "cp -p AWSTerm.Bbin /usr/lpp/r390/bin/AWSTerm"

# cp -p /usr/lpp/r390/bin/AWSTerm1             AWSTerm1.$(date +%m%d%y)
cp -p AWSTerm1.Abin /usr/lpp/r390/bin/AWSTerm1
echo "cp -p AWSTerm1.Abin /usr/lpp/r390/bin/AWSTerm1"

cp -p /usr/lpp/r390/bin/AWSInit             AWSInit.$(date +%m%d%y)
cp -p AWSInit.Abin /usr/lpp/r390/bin/AWSInit
echo "cp -p AWSInit.Abin /usr/lpp/r390/bin/AWSInit"

cp -p /usr/lpp/r390/bin/AWSIPL             AWSIPL.$(date +%m%d%y)
cp -p AWSIPL.Abin /usr/lpp/r390/bin/AWSIPL
echo "cp -p AWSIPL.Abin /usr/lpp/r390/bin/AWSIPL"

cp -p /usr/lpp/r390/bin/AWSStop            AWSStop.$(date +%m%d%y)
cp -p AWSStop.Bbin /usr/lpp/r390/bin/AWSStop
echo "cp -p AWSStop.Bbin /usr/lpp/r390/bin/AWSStop"

cp -p /usr/lpp/r390/bin/icecap.rel         icecap.rel.$(date +%m%d%y)
cp -p icecap.Abin /usr/lpp/r390/bin/icecap.rel
echo "cp -p icecap.Abin /usr/lpp/r390/bin/icecap.rel"

cp -p LAN3172.DOC /usr/lpp/r390/bin

./apply_common

cp -p *.MCP /usr/lpp/r390/bin

./licupdte /usr/bin/r390/AWS39X0
./licupdte /usr/bin/r390/AWS3900

echo "SEE SPECIAL INSTRUCTIONS BELOW (change to ipl390 required)"

echo ""
echo "*****************************************************"
echo "* All fixes applied.                                *"
echo "* Check for error messages.                         *"
echo "* Follow Special instructions in r4210fixs.lst      *"
echo "* Hit enter to list Special Instructions.           *"
echo "*****************************************************"
read;
tail -46 4210fixs.lst |more
echo ""
echo "*****************************************************"
echo "* Completed...                                      *"
echo "*                                                   *"
echo "* Re-boot AIX (shutdown -Fr) to activate fixes      *"
echo "*****************************************************"

exit
